home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / T-TPUG Old Monthly Disks / (c)t8.d64 / lincolnshire.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  2KB  |  83 lines
  1. 100 PRINT "MUSIC  (BY JIM BUTTERFIELD)
  2. 110 L1[178]54272:L2[178]54279:L3[178]54286
  3. 120 H1[178]L1[170]1:H2[178]L2[170]1:H3[178]L3[170]1
  4. 130 V1[178]L1[170]4:V2[178]L2[170]4:V3[178]L3[170]4
  5. 140 [151] 54296,15
  6. 150 [151] V1[170]1,9:[151] V1[170]2,0
  7. 160 [151] V2[170]1,36:[151] V2[170]2,36
  8. 170 [151] V3[170]1,18:[151] V3[170]2,170
  9. 180 T[178]TI
  10. 200 [151] V1,16:[151] V2,32:[151] V3,16
  11. 210 [135] S:[139] S[178]0 [137] 290
  12. 220 [135] X1,Y1,X2,Y2,X3,Y3
  13. 230 [139] X1 [167] [151] H1,X1:[151] L1,Y1:[151] V1,17
  14. 240 [139] X2 [167] [151] H2,X2:[151] L2,Y2:[151] V2,33
  15. 250 [139] X3 [167] [151] H3,X3:[151] L3,Y3:[151] V3,17
  16. 260 T[178]T[170]S
  17. 270 [139] T[177]TI [137] 270
  18. 280 [137] 200
  19. 290 [129]J[178]L1 [164] 54296:[151] J,0:[130] J
  20. 300 [131] 10,50,60,0,0,0,0
  21. 310 [131] 20,67,15,42,62,8,97
  22. 320 [131] 10,67,15,0,0,0,0
  23. 330 [131] 10,67,15,44,193,6,71
  24. 340 [131] 10,63,75,0,0,0,0
  25. 350 [131] 10,56,99,0,0,0,0
  26. 360 [131] 20,50,60,42,62,8,97
  27. 370 [131] 10,44,193,37,162,0,0
  28. 380 [131] 20,42,62,33,135,6,108
  29. 390 [131] 10,50,60,0,0,0,0
  30. 400 [131] 20,67,15,42,62,8,97
  31. 410 [131] 10,67,15,0,0,0,0
  32. 420 [131] 20,75,69,44,193,9,104
  33. 430 [131] 10,63,75,37,162,0,0
  34. 440 [131] 50,67,15,42,62,8,97
  35. 450 [131] 10,50,60,0,0,0,0
  36. 460 [131] 20,67,15,42,62,8,97
  37. 470 [131] 10,75,69,0,0,0,0
  38. 480 [131] 20,84,125,44,193,6,71
  39. 490 [131] 10,89,131,0,0,0,0
  40. 500 [131] 20,100,121,42,62,8,97
  41. 510 [131] 10,85,125,37,162,0,0
  42. 520 [131] 20,67,15,33,135,10,143
  43. 530 [131] 10,75,69,0,0,0,0
  44. 540 [131] 20,84,125,50,60,8,97
  45. 550 [131] 10,84,125,0,0,0,0
  46. 560 [131] 10,84,125,50,60,7,12
  47. 570 [131] 10,75,69,44,193,0,0
  48. 580 [131] 10,67,15,42,62,0,0
  49. 590 [131] 50,75,69,44,193,6,71
  50. 600 [131] 10,50,60,0,0,0,0
  51. 610 [131] 20,67,15,42,62,8,97
  52. 620 [131] 10,75,69,0,0,0,0
  53. 630 [131] 20,84,125,44,193,6,71
  54. 640 [131] 10,89,131,0,0,0,0
  55. 650 [131] 20,100,121,42,62,8,97
  56. 660 [131] 10,85,125,37,162,0,0
  57. 670 [131] 20,67,15,33,135,10,143
  58. 680 [131] 10,75,69,0,0,0,0
  59. 690 [131] 20,84,125,50,60,8,97
  60. 700 [131] 10,84,125,0,0,0,0
  61. 710 [131] 10,84,125,50,60,7,12
  62. 720 [131] 10,75,69,44,193,0,0
  63. 730 [131] 10,67,15,42,62,0,0
  64. 740 [131] 30,75,69,44,193,6,71
  65. 750 [131] 20,84,125,50,60,0,0
  66. 760 [131] 10,75,69,44,193,0,0
  67. 770 [131] 20,67,15,42,62,8,97
  68. 780 [131] 10,67,15,0,0,0,0
  69. 790 [131] 10,67,15,44,193,6,71
  70. 800 [131] 10,63,75,0,0,0,0
  71. 810 [131] 10,56,99,0,0,0,0
  72. 820 [131] 20,50,60,42,62,8,97
  73. 830 [131] 10,44,193,37,162,0,0
  74. 840 [131] 20,42,62,33,135,6,108
  75. 850 [131] 10,50,60,0,0,0,0
  76. 860 [131] 20,67,15,42,62,8,97
  77. 870 [131] 10,67,15,0,0,0,0
  78. 880 [131] 20,75,69,44,193,9,104
  79. 890 [131] 10,63,75,37,162,0,0
  80. 900 [131] 50,67,15,42,62,8,97
  81. 910 [131] 0,0,0,0,0
  82. 920 [131] 0
  83.